home *** CD-ROM | disk | FTP | other *** search
/ FM Towns: Free Software Collection 11 / FM Towns Free Software Collection 11.iso / t_os / tool / multiv / src / fs_save.bas < prev    next >
Encoding:
BASIC Source File  |  1995-01-17  |  205 b   |  6 lines
  1. 10000 SCREEN@ 0:CLS:LOAD@"OAX_FS.TIF"
  2. 10010 DIM FS%(INT((INT((399+7)/8)*238*4+2-1)/2))
  3. 10020 GET@A(0,0)-(398,237),FS%
  4. 10030 KILL "OAX_FS.OAX":SAVE@"OAX_FS.OAX",FS%
  5. 10040 LINE(0,0)-(398,237),XOR,%15,B
  6.